\begin{tikzpicture}
    \tkzDefPoints{0/0/B, 4/0/C, 3.5/2.2/A}
    \tkzDefLine[mediator, normed](A,B)  \tkzGetPoints{m}{n}
    \tkzDefLine[mediator, normed](B,C)  \tkzGetPoints{g}{h}
    \tkzDefLine[mediator, normed](C,A)  \tkzGetPoints{p}{q}
    \tkzInterLL(m,n)(g,h)  \tkzGetPoint{R}
    \tkzInterLL(m,n)(A,B)  \tkzGetPoint{N}
    \tkzInterLL(g,h)(B,C)  \tkzGetPoint{H}
    \tkzInterLL(p,q)(A,C)  \tkzGetPoint{P}
    \tkzDefPointOnLine[pos=1.8](N,R)  \tkzGetPoint{M}
    \tkzDefPointOnLine[pos=1.5](H,R)  \tkzGetPoint{G}
    \tkzDefPointOnLine[pos=1.4](P,R)  \tkzGetPoint{Q}

    \tkzDrawPolygon(A,B,C)
    \tkzDrawLines[add=0 and 0.3](M,N)
    \tkzDrawLines[add=0 and 0.3](G,H)
    \tkzDrawLines[add=0 and 0.2](Q,P)
    \tkzDrawSegments[dashed](A,R  B,R  C,R)
    \tkzMarkRightAngle[size=0.2](R,N,B)
    \tkzMarkRightAngle[size=0.2](R,H,B)
    \tkzMarkRightAngle[size=0.2](R,P,C)

    \tkzLabelPoints[above](A)
    \tkzLabelPoints[left](B)
    \tkzLabelPoints[right](C)
    \tkzLabelPoints[below,xshift=0.5em,yshift=0.3em](M)
    \tkzLabelPoints[above left](N)
    \tkzLabelPoints[right,xshift=-0.2em](G)
    \tkzLabelPoints[below right](H)
    \tkzLabelPoints[below right](P)
    \tkzLabelPoints[below](Q)
    \tkzLabelPoints[right](R)
\end{tikzpicture}

